' Nhiệm vụ: 
' - tạo utility xử lý các exception
'
'Tạo bởi: Csung
Option Explicit On 
Option Strict On

Public Class CExpUtils
    Public Shared Function get_CS_ExpHandler(ByVal i_e As Exception) As CDBExceptionHandler
        Return New CDBExceptionHandler(i_e, New CDBClientDBExceptionInterpret)
    End Function
    Public Shared Sub DefaultDBExpHandler(ByVal i_e As Exception)
        Dim v_err_handler As New CDBExceptionHandler(i_e, New CDBClientDBExceptionInterpret)
        v_err_handler.showErrorMessage()
    End Sub
End Class
